home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / System7 tools / Frontier / FileShare Monitor / FileShare Monitor.rsrc / data_21236_system.agents.["FileShare Monitor"] next >
Unknown  |  1991-09-23  |  2.0 KB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 73 63 70 74 00 01 04 ae | 00 02 00 00 00 f6 00 00 |scpt....|........|
|00000010| 06 b0 00 00 02 00 00 0f | 06 47 65 6e 65 76 61 00 |........|.Geneva.|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 09 00 00 00 00 |........|........|
|00000040| 00 1d 00 00 00 00 06 78 | 00 00 a4 a8 b2 1f a5 03 |.......x|........|
|00000050| b0 f8 00 00 00 1d 00 00 | 00 5c 00 06 01 4e 01 d3 |........|.\...N..|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 41 62 6f 75 74 20 74 68 | 65 20 46 69 6c 65 53 68 |About th|e FileSh|
|00000090| 61 72 65 20 4d 6f 6e 69 | 74 6f 72 0d 09 54 68 69 |are Moni|tor..Thi|
|000000a0| 73 20 61 67 65 6e 74 20 | 77 61 74 63 68 65 73 20 |s agent |watches |
|000000b0| 61 20 66 6f 6c 64 65 72 | 20 73 70 65 63 69 66 69 |a folder| specifi|
|000000c0| 65 64 20 69 6e 20 73 63 | 72 61 74 63 68 70 61 64 |ed in sc|ratchpad|
|000000d0| 2e 20 20 57 68 65 6e 20 | 74 68 65 20 75 73 65 72 |.  When |the user|
|000000e0| 20 64 72 6f 70 73 20 61 | 20 66 69 6c 65 0d 09 69 | drops a| file..i|
|000000f0| 6e 74 6f 20 74 68 69 73 | 20 66 6f 6c 64 65 72 2c |nto this| folder,|
|00000100| 20 65 69 74 68 65 72 20 | 66 72 6f 6d 20 74 68 65 | either |from the|
|00000110| 20 62 61 73 65 20 6d 61 | 63 68 69 6e 65 20 6f 72 | base ma|chine or|
|00000120| 20 74 68 65 20 6e 65 74 | 77 6f 72 6b 2c 20 74 68 | the net|work, th|
|00000130| 69 73 20 61 67 65 6e 74 | 20 73 65 6e 64 73 0d 09 |is agent| sends..|
|00000140| 61 6e 20 65 76 65 6e 74 | 20 74 6f 20 61 20 48 79 |an event| to a Hy|
|00000150| 70 65 72 43 61 72 64 20 | 73 74 61 63 6b 2e 20 54 |perCard |stack. T|
|00000160| 68 65 6e 20 64 65 6c 65 | 74 65 73 20 74 68 65 20 |hen dele|tes the |
|00000170| 66 69 6c 65 2e 20 20 49 | 74 20 63 6f 75 6c 64 20 |file.  I|t could |
|00000180| 64 6f 20 6f 74 68 65 72 | 20 61 63 74 69 6f 6e 73 |do other| actions|
|00000190| 2e 0d 69 6e 69 74 69 61 | 6c 69 7a 65 20 6c 6f 63 |..initia|lize loc|
|000001a0| 61 6c 20 76 61 72 69 61 | 62 6c 65 73 0d 6c 6f 63 |al varia|bles.loc|
|000001b0| 61 6c 28 6e 6f 46 69 6c | 65 73 20 3d 20 74 72 75 |al(noFil|es = tru|
|000001c0| 65 2c 73 74 69 6c 6c 42 | 75 73 79 20 3d 20 66 61 |e,stillB|usy = fa|
|000001d0| 6c 73 65 2c 66 6f 6c 64 | 65 72 20 3d 20 73 63 72 |lse,fold|er = scr|
|000001e0| 61 74 63 68 70 61 64 2e | 66 69 6c 65 53 68 61 72 |atchpad.|fileShar|
|000001f0| 65 46 6f 6c 64 65 72 29 | 0d 69 66 20 74 68 65 20 |eFolder)|.if the |
|00000200| 66 6f 6c 64 65 72 20 77 | 65 27 76 65 20 62 65 65 |folder w|e've bee|
|00000210| 6e 20 74 6f 6c 64 20 74 | 6f 20 77 61 74 63 68 20 |n told t|o watch |
|00000220| 65 78 69 73 74 73 2c 20 | 74 68 65 6e 20 6c 65 74 |exists, |then let|
|00000230| 27 73 20 63 68 65 63 6b | 20 69 74 0d 69 66 20 66 |'s check| it.if f|
|00000240| 69 6c 65 2e 65 78 69 73 | 74 73 20 28 66 6f 6c 64 |ile.exis|ts (fold|
|00000250| 65 72 29 0d 09 69 66 20 | 6d 6f 64 20 64 61 74 65 |er)..if |mod date|
|00000260| 20 6f 66 20 66 6f 6c 64 | 65 72 20 68 61 73 20 63 | of fold|er has c|
|00000270| 68 61 6e 67 65 64 2c 20 | 74 68 65 6e 20 75 73 65 |hanged, |then use|
|00000280| 72 20 6d 61 79 20 68 61 | 76 65 20 64 72 6f 70 70 |r may ha|ve dropp|
|00000290| 65 64 20 66 69 6c 65 73 | 20 69 6e 74 6f 20 69 74 |ed files| into it|
|000002a0| 0d 09 6c 6f 63 61 6c 20 | 28 6d 6f 64 64 61 74 65 |..local |(moddate|
|000002b0| 20 3d 20 66 69 6c 65 2e | 6d 6f 64 69 66 69 65 64 | = file.|modified|
|000002c0| 20 28 66 6f 6c 64 65 72 | 29 29 0d 09 69 66 20 6d | (folder|))..if m|
|000002d0| 6f 64 64 61 74 65 20 3e | 20 73 63 72 61 74 63 68 |oddate >| scratch|
|000002e0| 70 61 64 2e 66 69 6c 65 | 53 68 61 72 65 4c 61 73 |pad.file|ShareLas|
|000002f0| 74 4d 6f 64 0d 09 09 6c | 6f 6f 70 20 66 6f 72 20 |tMod...l|oop for |
|00000300| 65 76 65 72 79 20 65 6e | 74 72 79 20 69 6e 20 74 |every en|try in t|
|00000310| 68 65 20 66 6f 6c 64 65 | 72 0d 09 09 66 69 6c 65 |he folde|r...file|
|00000320| 6c 6f 6f 70 20 28 66 6e | 61 6d 65 20 69 6e 20 66 |loop (fn|ame in f|
|00000330| 6f 6c 64 65 72 29 0d 09 | 09 09 69 66 20 74 68 65 |older)..|..if the|
|00000340| 20 65 6e 74 72 79 20 69 | 73 6e 27 74 20 61 20 66 | entry i|sn't a f|
|00000350| 6f 6c 64 65 72 2c 20 63 | 68 65 63 6b 20 74 6f 20 |older, c|heck to |
|00000360| 73 65 65 20 69 66 20 69 | 74 20 69 73 20 62 75 73 |see if i|t is bus|
|00000370| 79 0d 09 09 09 69 66 20 | 21 66 69 6c 65 2e 69 73 |y....if |!file.is|
|00000380| 66 6f 6c 64 65 72 28 66 | 6e 61 6d 65 29 0d 09 09 |folder(f|name)...|
|00000390| 09 09 6e 6f 46 69 6c 65 | 73 20 3d 20 66 61 6c 73 |..noFile|s = fals|
|000003a0| 65 0d 09 09 09 09 73 74 | 69 6c 6c 42 75 73 79 20 |e.....st|illBusy |
|000003b0| 3d 20 73 74 69 6c 6c 42 | 75 73 79 20 7c 7c 20 66 |= stillB|usy || f|
|000003c0| 69 6c 65 2e 69 73 62 75 | 73 79 28 66 6e 61 6d 65 |ile.isbu|sy(fname|
|000003d0| 29 0d 09 09 69 66 20 74 | 68 65 69 72 20 61 72 65 |)...if t|heir are|
|000003e0| 20 66 69 6c 65 73 20 74 | 68 61 74 20 61 72 65 6e | files t|hat aren|
|000003f0| 27 74 20 62 75 73 79 2c | 20 74 68 65 6e 20 73 74 |'t busy,| then st|
|00000400| 61 72 74 20 64 6f 69 6e | 67 20 61 63 74 69 6f 6e |art doin|g action|
|00000410| 0d 09 09 69 66 20 21 73 | 74 69 6c 6c 42 75 73 79 |...if !s|tillBusy|
|00000420| 20 26 26 20 21 6e 6f 46 | 69 6c 65 73 0d 09 09 09 | && !noF|iles....|
|00000430| 75 70 64 61 74 65 20 74 | 68 65 20 6d 6f 64 20 64 |update t|he mod d|
|00000440| 61 74 65 0d 09 09 09 73 | 63 72 61 74 63 68 70 61 |ate....s|cratchpa|
|00000450| 64 2e 66 69 6c 65 53 68 | 61 72 65 4c 61 73 74 4d |d.fileSh|areLastM|
|00000460| 6f 64 20 3d 20 6d 6f 64 | 64 61 74 65 0d 09 09 09 |od = mod|date....|
|00000470| 66 69 6c 65 6c 6f 6f 70 | 28 66 6e 61 6d 65 20 69 |fileloop|(fname i|
|00000480| 6e 20 66 6f 6c 64 65 72 | 29 0d 09 09 09 09 20 77 |n folder|)..... w|
|00000490| 65 20 64 6f 6e 27 74 20 | 68 61 6e 64 6c 65 20 66 |e don't |handle f|
|000004a0| 6f 6c 64 65 72 73 2c 20 | 73 6f 20 73 6b 69 70 20 |olders, |so skip |
|000004b0| 66 6f 6c 64 65 72 20 65 | 6e 74 72 69 65 73 0d 09 |folder e|ntries..|
|000004c0| 09 09 09 69 66 20 21 66 | 69 6c 65 2e 69 73 66 6f |...if !f|ile.isfo|
|000004d0| 6c 64 65 72 28 66 6e 61 | 6d 65 29 0d 09 09 09 09 |lder(fna|me).....|
|000004e0| 09 69 6e 66 6f 72 6d 20 | 77 65 20 61 72 65 20 64 |.inform |we are d|
|000004f0| 6f 69 6e 67 20 61 63 74 | 69 6f 6e 0d 09 09 09 09 |oing act|ion.....|
|00000500| 09 6d 73 67 28 22 57 6f | 72 6b 69 6e 67 20 6f 6e |.msg("Wo|rking on|
|00000510| 3a 20 22 2b 66 6e 61 6d | 65 29 0d 09 09 09 09 09 |: "+fnam|e)......|
|00000520| 63 68 65 63 6b 20 74 6f | 20 73 65 65 20 69 66 20 |check to| see if |
|00000530| 48 79 70 65 72 63 61 72 | 64 20 69 73 20 72 75 6e |Hypercar|d is run|
|00000540| 6e 69 6e 67 0d 09 09 09 | 09 09 69 66 20 73 79 73 |ning....|..if sys|
|00000550| 2e 61 70 70 69 73 72 75 | 6e 6e 69 6e 67 28 27 57 |.appisru|nning('W|
|00000560| 49 4c 44 27 29 0d 09 09 | 09 09 09 09 73 65 6e 64 |ILD')...|....send|
|00000570| 20 61 70 70 6c 65 20 65 | 76 65 6e 74 20 74 6f 20 | apple e|vent to |
|00000580| 48 79 70 65 72 63 61 72 | 64 0d 09 09 09 09 09 09 |Hypercar|d.......|
|00000590| 61 70 70 6c 65 65 76 65 | 6e 74 28 27 57 49 4c 44 |appleeve|nt('WILD|
|000005a0| 27 2c 27 48 41 50 59 27 | 2c 27 50 45 50 4c 27 2c |','HAPY'|,'PEPL',|
|000005b0| 27 46 52 4f 4d 27 2c 74 | 65 78 74 28 66 6e 61 6d |'FROM',t|ext(fnam|
|000005c0| 65 29 29 0d 09 09 09 09 | 09 09 66 69 6e 69 73 68 |e)).....|..finish|
|000005d0| 65 64 20 61 63 74 69 6f | 6e 2c 20 73 6f 20 64 65 |ed actio|n, so de|
|000005e0| 6c 65 74 65 20 74 68 65 | 20 66 69 6c 65 0d 09 09 |lete the| file...|
|000005f0| 09 09 09 09 66 69 6c 65 | 2e 64 65 6c 65 74 65 28 |....file|.delete(|
|00000600| 66 6e 61 6d 65 29 0d 09 | 09 74 68 65 20 6d 6f 64 |fname)..|.the mod|
|00000610| 20 64 61 74 65 20 63 68 | 61 6e 67 65 64 2c 20 62 | date ch|anged, b|
|00000620| 75 74 20 74 68 65 72 65 | 20 77 65 72 65 6e 27 74 |ut there| weren't|
|00000630| 20 61 6e 79 20 6e 65 77 | 20 66 69 6c 65 73 20 73 | any new| files s|
|00000640| 6f 20 6a 75 73 74 20 72 | 65 6d 65 6d 62 65 72 20 |o just r|emember |
|00000650| 64 61 74 65 0d 09 09 69 | 66 20 6e 6f 46 69 6c 65 |date...i|f noFile|
|00000660| 73 0d 09 09 09 73 63 72 | 61 74 63 68 70 61 64 2e |s....scr|atchpad.|
|00000670| 66 69 6c 65 53 68 61 72 | 65 4c 61 73 74 4d 6f 64 |fileShar|eLastMod|
|00000680| 20 3d 20 6d 6f 64 64 61 | 74 65 0d 09 74 68 65 20 | = modda|te..the |
|00000690| 6d 6f 64 20 64 61 74 65 | 20 68 61 73 6e 27 65 20 |mod date| hasn'e |
|000006a0| 63 68 61 6e 67 65 64 2c | 20 73 6f 20 6a 75 73 74 |changed,| so just|
|000006b0| 20 77 61 69 74 0d 09 65 | 6c 73 65 0d 09 09 6d 73 | wait..e|lse...ms|
|000006c0| 67 28 22 46 69 6c 65 53 | 68 61 72 65 20 77 61 69 |g("FileS|hare wai|
|000006d0| 74 69 6e 67 2e 2e 2e 22 | 29 0d 74 68 65 20 66 6f |ting..."|).the fo|
|000006e0| 6c 64 65 72 20 64 6f 65 | 73 6e 27 74 20 65 78 69 |lder doe|sn't exi|
|000006f0| 73 74 2c 20 73 6f 20 69 | 6e 66 6f 72 6d 20 75 73 |st, so i|nform us|
|00000700| 65 72 0d 65 6c 73 65 0d | 09 6d 73 67 28 22 46 69 |er.else.|.msg("Fi|
|00000710| 6c 65 53 68 61 72 65 20 | 66 6f 6c 64 65 72 20 64 |leShare |folder d|
|00000720| 6f 65 73 6e 27 74 20 65 | 78 69 73 74 21 22 29 0d |oesn't e|xist!").|
|00000730| 84 00 00 00 00 00 80 00 | 00 00 00 00 80 00 00 00 |........|........|
|00000740| 00 00 80 00 00 00 00 00 | 84 00 00 00 00 00 80 00 |........|........|
|00000750| 00 00 00 00 84 00 00 00 | 00 00 80 00 00 00 00 00 |........|........|
|00000760| 84 00 00 00 00 00 80 00 | 00 00 00 00 80 00 00 00 |........|........|
|00000770| 00 00 84 00 00 00 00 00 | 80 00 00 00 00 00 84 00 |........|........|
|00000780| 00 00 00 00 80 00 00 00 | 00 00 80 00 00 00 00 00 |........|........|
|00000790| 80 00 00 00 00 00 84 00 | 00 00 00 00 80 00 00 00 |........|........|
|000007a0| 00 00 84 00 00 00 00 00 | 80 00 00 00 00 00 80 00 |........|........|
|000007b0| 00 00 00 00 84 00 00 00 | 00 00 80 00 00 00 00 00 |........|........|
|000007c0| 84 00 00 00 00 00 80 00 | 00 00 00 00 84 00 00 00 |........|........|
|000007d0| 00 00 80 00 00 00 00 00 | 84 00 00 00 00 00 80 00 |........|........|
|000007e0| 00 00 00 00 84 00 00 00 | 00 00 80 00 00 00 00 00 |........|........|
|000007f0| 84 00 00 00 00 00 80 00 | 00 00 00 00 80 00 00 00 |........|........|
|00000800| 00 00 84 00 00 00 00 00 | 80 00 00 00 00 00 80 00 |........|........|
|00000810| 00 00 00 00 84 00 00 00 | 00 00 80 00 00 00 00 00 |........|........|
|00000820| 80 00 00 00 00 00       |                         |......  |        |
+--------+-------------------------+-------------------------+--------+--------+